home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Software Vault: The Diamond Collection
/
The Diamond Collection (Software Vault)(Digital Impact).ISO
/
cdr27
/
fwkcs200.zip
/
QIKSTART.BAT
< prev
next >
Wrap
DOS Batch File
|
1995-01-16
|
9KB
|
240 lines
@echo off
if exist register.key goto rk
cls
echo.
echo.
echo If you registered FWKCS(TM) Version 1.19 or later before 1995 Jan 16,
echo please copy your registration keyfile into this directory, and name
echo the keyfile REGISTER.KEY. Then restart this QIKSTART program.
echo.
echo If you do not have an FWKCS registration key, please make sure
echo that your computer system's date is set to today's date.
echo.
echo.
echo To stop this program, press Ctrl+C, then y
echo.
pause
:rk
cls
if not .%2 == . goto az
if not exist x_add.lst echo.
echo Your use of this software is at solely your own risk.
echo ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
if not exist x_add.lst echo.
echo This software is intended for use under DOS 3.30 or later, or in a suitable
echo DOS session under a multitasking system (including IBM OS/2 2.0 or later).
echo.
echo If you encounter any system conflicts when using this software,
echo please check your system configuration (and DOS session settings).
echo.
echo If the problem remains, please advise the author at
echo.
echo Internet email address if no reply, write to Fred Kantor
echo fred.kantor@factory.com 523 West 112 Street
echo New York, NY 10025
echo.
if exist x_add.lst echo Automatic exclusion list X_ADD.LST has been found, to add to data base.
if exist x_add.lst echo.
if exist register.key goto rk1
echo Note: QIKSTART lets you run an unregistered copy of FWKCS, with a copy of
echo REGISTER.FRM in the same directory with FWKCS.EXE. You can put the
echo \CSA directory on your PATH, and call FWKCS from anywhere on your
echo system.
echo.
echo The suggested test time is up to 30 days. To register, see REGISTER.FRM.
echo ~~~~~~~~~~~~~
:rk1
pause
cls
:az
echo Part of FWKCS(TM) Contents_Signature System, Version 2.00.
echo (C)Copyright Frederick W. Kantor 1989, 1995. All rights reserved.
echo Your use of the FWKCS(TM) Contents_Signature System is at solely your
echo own risk. For safety, please have proper backups of your files.
echo.
echo QIKSTART.BAT to set up the FWKCS(TM) Contents_Signature System, Ver. 2.00;
echo for use in same directory with FWKCS200.ZIP, FWKCS.200, and FWKCS_TM.200.
echo QIKSTART does not search your file collection (see README.TXT).
echo Disk space: allow 5 Meg. setup, ca 1.9 Meg. static files, starting empty.
echo For full installation with search of your file collection, use INSTALL.BAT.
echo (More information provided as FWKCS.200 package is opened; see README.TXT.)
echo.
echo If you are replacing FWKCS Ver. 1.12 or later, use REPLACE.BAT.
echo ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
echo Usage: QIKSTART d D "<enter>"
echo QIKSTART d D c "<enter>"
echo.
echo where d without ":" is the drive for the \CS directory
echo D without ":" is the drive for the \CSA directory
echo c automatically capture contents_signatures re FWKCS200.ZIP
echo (recommended)
if .%1 == ./* goto end
if .%1 == . goto nd
if .%2 == . goto nod2
if .%3 == .C goto aa
if .%3 == .c goto aa
if not .%3 == . goto bi
:aa
echo.
echo Are these drives correct: %1:\CS and %2:\CSA ? If not, stop now!
echo To quit, press Ctrl+C, then y ~~~~~~~~
echo.
pause
if exist fwkcs200.zip attrib -r fwkcs200.zip > nul
if exist 0_setup.bat del 0_setup.bat > nul
if exist 0_setup.bat attrib -r 0_setup.bat > nul
if exist 0_setup.bat del 0_setup.bat > nul
if exist replm200.200 del replm200.200 > nul
if exist replm200.200 attrib -r replm200.200 > nul
if exist replm200.200 del replm200.200 > nul
if exist 2_setup.bat del 2_setup.bat > nul
if exist 2_setup.bat attrib -r 2_setup.bat > nul
if exist 2_setup.bat del 2_setup.bat > nul
if exist s_setup.bat del s_setup.bat > nul
if exist s_setup.bat attrib -r s_setup.bat > nul
if exist s_setup.bat del s_setup.bat > nul
if exist myowncsl.srt del myowncsl.srt > nul
if exist myowncsl.srt attrib -r myowncsl.srt > nul
if exist myowncsl.srt del myowncsl.srt > nul
if exist #@!#@!$$.@!@ del #@!#@!$$.@!@ > nul
if exist #@!#@!$$.@!@ attrib -r #@!#@!$$.@!@ > nul
if exist #@!#@!$$.@!@ del #@!#@!$$.@!@ > nul
if exist $@!#@!$$.@!@ del $@!#@!$$.@!@ > nul
if exist $@!#@!$$.@!@ attrib -r $@!#@!$$.@!@ > nul
if exist $@!#@!$$.@!@ del $@!#@!$$.@!@ > nul
if exist $@!#@$!$.@!@ del $@!#@$!$.@!@ > nul
if exist $@!#@$!$.@!@ attrib -r $@!#@$!$.@!@ > nul
if exist $@!#@$!$.@!@ del $@!#@$!$.@!@ > nul
cls
if not exist fwkcs200.exe goto n1
if exist fwkhi.com del fwkhi.com > nul
if exist fwkhi.com attrib -r fwkhi.com > nul
if exist fwkhi.com del fwkhi.com > nul
fwkcs200 -o fwkhi.com > nul
if exist fwkhi.com goto n2
attrib -r fwkcs200.exe > nul
:n1
if not exist fwkcs.200 goto nd
if not exist fwkcs_tm.200 goto cm
ren fwkcs_tm.200 fwkcs_tm.com > nul
fwkcs_tm < fwkcs.200 > fwkcs200.exe
if errorlevel 1 goto fbad
ren fwkcs_tm.com fwkcs_tm.200 > nul
fwkcs200 -o fwkhi.com > nul
if not exist fwkhi.com goto fbad
:n2
cls
if .%3 == .c goto n3
if not .%3 == .C goto nocs
:n3
if exist fwkcs200.zip ren fwkcs200.zip $@!#@!$$.@!@ > nul
fwkcs200.exe -o fwkcs.exe register.frm > nul
if not exist fwkcs.exe goto nz
if not exist register.key goto nk
fwkcs /t20register[+register.key]
fwkcs /t20register > nul
if not errorlevel 98 goto wk
echo.
echo Your REGISTER.KEY file was apparently defective.
echo.
echo Continuing in unregistered mode...
echo.
:nk
fwkcs
if not errorlevel 99 goto id
:wk
echo.
echo Automatically capturing the contents_signatures of the
echo files in FWKCS(TM) version 2.00 for future reference...
echo.
ren fwkcs200.exe fwkcs200.zip > nul
fwkcs /rt20/1 fwkcs200.zip #@!#@!$$.@!@ > nul
ren fwkcs200.zip fwkcs200.exe > nul
if exist $@!#@!$$.@!@ ren $@!#@!$$.@!@ fwkcs200.zip > nul
if exist fwkcs200.zip fwkcs /t20/1 fwkcs200.zip >> #@!#@!$$.@!@
if exist fwkcs200.zip goto kcz
if exist #@@!##@_._$_ del #@@!##@_._$_ > nul
if exist #@@!##@_._$_ attrib -r #@@!##@_._$_ > nul
if exist FILE_ID.DIZ echo FILE_ID.DIZ > #@@!##@_._$_
if exist README.1ST echo README.1ST >> #@@!##@_._$_
if exist README.TXT echo README.TXT >> #@@!##@_._$_
if exist WHATSNEW.TXT echo WHATSNEW.TXT >> #@@!##@_._$_
if exist REGISTER.DOC echo REGISTER.DOC >> #@@!##@_._$_
if exist REGISTER.FRM echo REGISTER.FRM >> #@@!##@_._$_
if exist INSTALL.BAT echo INSTALL.BAT >> #@@!##@_._$_
if exist REPLACE.BAT echo REPLACE.BAT >> #@@!##@_._$_
if exist QIKSTART.BAT echo QIKSTART.BAT >> #@@!##@_._$_
if exist GETLOOK.BAT echo GETLOOK.BAT >> #@@!##@_._$_
if exist FWKCS.200 echo FWKCS.200 >> #@@!##@_._$_
if exist FWKCS_TM.200 echo FWKCS_TM.200 >> #@@!##@_._$_
fwkcs /t20/1cp #@@!##@_._$_ >> #@!#@!$$.@!@
del #@@!##@_._$_ > nul
:kcz
fwkcs #@!#@!$$.@!@ /rt20a7.8v",!" $@!#@$!$.@!@ > nul
del #@!#@!$$.@!@ > nul
fwkcs $@!#@$!$.@!@ /rt20s > nul
if exist $$mt$$ del $$mt$$ > nul
if exist $$mt$$ fwkcs /rt30a7.7c $$mt$$ > nul
fwkcs $$mt$$ /rt30mn > nul
fwkcs $@!#@$!$.@!@ $$mt$$ myowncsl.srt /rt20ms > nul
del $$mt$$ > nul
del $@!#@$!$.@!@ > nul
del fwkcs.exe > nul
:nocs
fwkcs200 -o s_setup.bat > nul
del fwkhi.com > nul
s_setup %1 ! %2 1 0
:nv200
echo.
echo QIKSTART.BAT is for use in the same directory together with
echo files FWKCS.200 and FWKCS_TM.200 .
goto clu
:bi
echo.
echo The third entry, if not blank, must be "c" or "C" (without quotes),
echo to capture contents_signatures re files in FWKCS200.ZIP.
goto helpr
:nz
echo.
echo Problem in running self_extraction.
goto fbad
:id
if exist fwkcs200.exe del fwkcs200.exe > nul
if exist $@!#@!$$.@!@ ren $@!#@!$$.@!@ fwkcs200.zip > nul
del fwkcs.exe > nul
echo.
echo Bad system date!
echo.
echo Execution aborted!
echo.
echo After you have set your computer system's date to today's date,
goto helpr
:fbad
del fwkcs200.exe > nul
ren fwkcs_tm.com fwkcs_tm.200 > nul
echo.
echo Bad file. Execution aborted.
:clu
echo.
echo Please clean up, and try again. See README.TXT.
goto end
:cm
echo.
echo I need FWKCS_TM.200.
echo.
echo I quit!
goto end
:nod2
echo.
echo I need two drive entries (they can both have the same letter).
:helpr
echo.
echo Please try again...
goto end
:nd
echo.
echo Please see "Usage", above...
:end
if exist fwkhi.com del fwkhi.com > nul
echo.